Prolog - List Operations Sum List